home *** CD-ROM | disk | FTP | other *** search
/ BBS in a Box 7 / BBS in a Box - Macintosh - Volume VII (BBS in a Box) (January 1993).iso / Files / Hyper / K-L / Langley.cpt / Fort Langley 0.96 / card_8507.txt < prev    next >
Text File  |  1987-12-04  |  1KB  |  76 lines
  1. -- card: 8507 from stack: in.96
  2. -- bmap block id: 3845
  3. -- flags: 0000
  4. -- background id: 2701
  5. -- name: Map2
  6.  
  7.  
  8. -- part 1 (button)
  9. -- low flags: 00
  10. -- high flags: 0000
  11. -- rect: left=244 top=116 right=275 bottom=370
  12. -- title width / last selected line: 0
  13. -- icon id / first selected line: 0 / 0
  14. -- text alignment: 1
  15. -- font id: 0
  16. -- text size: 12
  17. -- style flags: 0
  18. -- line height: 16
  19. -- part name: 
  20. ----- HyperTalk script -----
  21. on mouseUp
  22.  
  23.   set lockscreen to true
  24.   go to card "legend"
  25.   hide card field "key1"
  26.   hide card field "key2"
  27.  
  28.   go card "map2"
  29.   set lockscreen to false
  30.   visual effect venetian blinds slowly
  31.   go card "legend"
  32. end mouseUp
  33.  
  34.  
  35.  
  36. -- part 2 (button)
  37. -- low flags: 00
  38. -- high flags: 0000
  39. -- rect: left=154 top=23 right=55 bottom=487
  40. -- title width / last selected line: 0
  41. -- icon id / first selected line: 0 / 0
  42. -- text alignment: 1
  43. -- font id: 0
  44. -- text size: 12
  45. -- style flags: 0
  46. -- line height: 16
  47. -- part name: 
  48. ----- HyperTalk script -----
  49. on mouseUp
  50.   Visual effect dissolve slowly
  51.   go to card "the fort"
  52.   wait for 2 seconds
  53.   visual effect dissolve slowly
  54.   go to card legend
  55. end mouseUp
  56.  
  57.  
  58.  
  59. -- part 3 (button)
  60. -- low flags: 00
  61. -- high flags: 0004
  62. -- rect: left=452 top=303 right=331 bottom=491
  63. -- title width / last selected line: 0
  64. -- icon id / first selected line: 14953 / 14953
  65. -- text alignment: 1
  66. -- font id: 0
  67. -- text size: 12
  68. -- style flags: 0
  69. -- line height: 16
  70. -- part name: 
  71. ----- HyperTalk script -----
  72. on mouseUp
  73.   go first
  74. end mouseUp
  75.  
  76.